home *** CD-ROM | disk | FTP | other *** search
- // Borland C++ Builder
- // Copyright (c) 1995, 1998 by Borland International
- // All rights reserved
-
- // (DO NOT EDIT: machine generated header) 'qrexpbld.pas' rev: 3.00
-
- #ifndef qrexpbldHPP
- #define qrexpbldHPP
- #include <qr2const.hpp>
- #include <qrprntr.hpp>
- #include <Db.hpp>
- #include <ComCtrls.hpp>
- #include <ExtCtrls.hpp>
- #include <StdCtrls.hpp>
- #include <Dialogs.hpp>
- #include <Forms.hpp>
- #include <Controls.hpp>
- #include <Graphics.hpp>
- #include <Classes.hpp>
- #include <SysUtils.hpp>
- #include <Messages.hpp>
- #include <Windows.hpp>
- #include <SysInit.hpp>
- #include <System.hpp>
-
- //-- user supplied -----------------------------------------------------------
-
- namespace Qrexpbld
- {
- //-- type declarations -------------------------------------------------------
- class DELPHICLASS TQRExprBuilder;
- class PASCALIMPLEMENTATION TQRExprBuilder : public Forms::TForm
- {
- typedef Forms::TForm inherited;
-
- __published:
- Stdctrls::TButton* OK;
- Stdctrls::TButton* Cancel;
- Stdctrls::TLabel* CurrentExpr;
- Stdctrls::TButton* Undo;
- Stdctrls::TButton* Clear;
- Stdctrls::TLabel* Element;
- Extctrls::TBevel* Bevel1;
- Stdctrls::TGroupBox* ConstantGB;
- Stdctrls::TEdit* aConstant;
- Stdctrls::TComboBox* ConstantType;
- Stdctrls::TButton* AddNumeric;
- Stdctrls::TGroupBox* DataFieldGB;
- Stdctrls::TComboBox* DataSet;
- Stdctrls::TButton* AddDatafield;
- Stdctrls::TGroupBox* FunctionGB;
- Stdctrls::TLabel* FunctionName;
- Stdctrls::TButton* AddFunction;
- Stdctrls::TLabel* FunctionDescript;
- Stdctrls::TGroupBox* OperatorsGB;
- Stdctrls::TButton* AddPlus;
- Stdctrls::TButton* AddMinus;
- Stdctrls::TButton* AddMul;
- Stdctrls::TButton* AddEqual;
- Stdctrls::TButton* AddParentese;
- Stdctrls::TButton* AddSmaller;
- Stdctrls::TButton* AddLarger;
- Stdctrls::TButton* Button1;
- Stdctrls::TButton* Button2;
- Stdctrls::TButton* AddNotEqual;
- Stdctrls::TButton* AddNot;
- Stdctrls::TButton* AddAnd;
- Stdctrls::TButton* AddOr;
- Stdctrls::TListBox* DataField;
- Stdctrls::TLabel* Label1;
- Stdctrls::TLabel* Label2;
- Stdctrls::TButton* AddDiv;
- Stdctrls::TComboBox* FunctionType;
- Stdctrls::TLabel* Label3;
- Stdctrls::TListBox* AvailableFunc;
- Stdctrls::TLabel* Label4;
- void __fastcall AddNumericClick(System::TObject* Sender);
- void __fastcall AddPlusClick(System::TObject* Sender);
- void __fastcall AddMinusClick(System::TObject* Sender);
- void __fastcall AddMulClick(System::TObject* Sender);
- void __fastcall AddDivClick(System::TObject* Sender);
- void __fastcall NumericConstantKeyPress(System::TObject* Sender, char &Key);
- void __fastcall AddParenteseClick(System::TObject* Sender);
- void __fastcall DataSetChange(System::TObject* Sender);
- void __fastcall DataFieldPageEnter(System::TObject* Sender);
- void __fastcall AddDatafieldClick(System::TObject* Sender);
- void __fastcall ClearClick(System::TObject* Sender);
- void __fastcall AddAndClick(System::TObject* Sender);
- void __fastcall AddOrClick(System::TObject* Sender);
- void __fastcall AddNotClick(System::TObject* Sender);
- void __fastcall AddEqualClick(System::TObject* Sender);
- void __fastcall AddSmallerClick(System::TObject* Sender);
- void __fastcall AddLargerClick(System::TObject* Sender);
- void __fastcall Button2Click(System::TObject* Sender);
- void __fastcall Button1Click(System::TObject* Sender);
- void __fastcall AddNotEqualClick(System::TObject* Sender);
- void __fastcall FunctionTypeClick(System::TObject* Sender);
- void __fastcall AvailableFuncClick(System::TObject* Sender);
- void __fastcall AddFunctionClick(System::TObject* Sender);
- void __fastcall FormCreate(System::TObject* Sender);
- void __fastcall FormDestroy(System::TObject* Sender);
- void __fastcall UndoClick(System::TObject* Sender);
- void __fastcall FormActivate(System::TObject* Sender);
-
- private:
- Forms::TForm* QRForm;
- Classes::TStrings* UndoList;
- void __fastcall AddToElement(System::AnsiString Value);
- void __fastcall GetFunctionTypes(int Value);
- void __fastcall SelectFunction(int value);
- void __fastcall AddAFunction(const System::AnsiString FuncName, const System::AnsiString Arguments)
- ;
- public:
- /* TCustomForm.Create */ __fastcall virtual TQRExprBuilder(Classes::TComponent* AOwner) : Forms::TForm(
- AOwner) { }
- /* TCustomForm.CreateNew */ __fastcall TQRExprBuilder(Classes::TComponent* AOwner, int Dummy) : Forms::
- TForm(AOwner, Dummy) { }
- /* TCustomForm.Destroy */ __fastcall virtual ~TQRExprBuilder(void) { }
-
- public:
- /* TWinControl.CreateParented */ __fastcall TQRExprBuilder(HWND ParentWindow) : Forms::TForm(ParentWindow
- ) { }
-
- };
-
- //-- var, const, procedure ---------------------------------------------------
- extern PACKAGE bool __fastcall GetExpression(System::AnsiString ACaption, System::AnsiString &Value,
- Forms::TForm* DataSetForm);
-
- } /* namespace Qrexpbld */
- #if !defined(NO_IMPLICIT_NAMESPACE_USE)
- using namespace Qrexpbld;
- #endif
- //-- end unit ----------------------------------------------------------------
- #endif // qrexpbld
-